home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus 1996 #3
/
Amiga Plus CD - 1996 - No. 3.iso
/
demo-versionen
/
databaseprofessional_v3.0
/
clipart
/
show_packed.rexx
< prev
Wrap
OS/2 REXX Batch file
|
1995-10-07
|
398b
|
20 lines
/* Zeigt in ein Archiv gepacktes Clip an */
OPTIONS RESULTS
ARG bild
lha = "SYS:c/lha"
viewer = "DBPro:DTView/DTView"
extractpath = "T:"
pos = MAX(LastPos("/",bild),LastPos(":",bild))
archiv = SubStr(bild,1,pos-1) || ".lha"
clip = SubStr(bild,pos+1,Length(bild)-pos)
ADDRESS COMMAND
lha || " > NIL: -mx x " || archiv || " " || clip || " " || extractpath
viewer || " " || extractpath || clip